home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1995 October / EnigmA AMIGA RUN 01 (1995)(G.R. Edizioni)(IT)[!][issue 1995-10][Aminet 7].iso / Enigma Amiga CD / Programmi / Ital20.lha / ital20 / arexx / TansBlock.ced < prev    next >
Text File  |  1995-05-24  |  628b  |  38 lines
  1. /*
  2. *
  3. * TraduciBlocco.ced
  4. * Arturo Ortino 15.12.94
  5. *
  6. * This is a very simple script to translate to Italian
  7. * an english text block marked with ("Mark Block") by means of 
  8. * the well-known "CED" Text-Editor.
  9. *
  10. *
  11. * NOTE: This script DOESN'T check wether Ital is running or not,
  12. *       so execute Ital before starting this script.
  13. *
  14. * 
  15. */
  16.  
  17. OPTIONS RESULTS
  18.  
  19. address 'rexx_ced'
  20.  
  21. TempFile="ram:italtemp"
  22. TempFileTRA="ram:italtemp.TRA"
  23.  
  24. 'cut block'
  25. 'Save block to file '|| TempFile
  26.  
  27. address 'ITAL'
  28.  
  29. TempFile
  30.  
  31. address 'rexx_ced'
  32. 'Include file '|| TempFileTRA
  33.  
  34. ADDRESS COMMAND Delete TempFile
  35. ADDRESS COMMAND Delete TempFileTRA
  36.  
  37. exit 0
  38.